append value to vector in r